home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / comm / misc / OCproFinal_src.lha / ONline_Check414_SRC / s / ONline_Check.plugin < prev   
Text File  |  1997-11-16  |  3KB  |  75 lines
  1. /*ONline Check Plugin Schnittstelle
  2.  
  3.   hiermit ist es möglich sich seine eigenen Wünsche "selbstzuprogrammieren"
  4.   Die Pluginschnittstelle wird jedesmal wenn ein Berechnungs Eintrag gefunden 
  5.   gestartet.(Wenn vorhanden).
  6.   und bei der Endberechnung wird der PLUGIN auch nochmal aufgerufen.
  7.  
  8.   Unterstützt werden folgende Variablen ,die vom Programm mittels setclip gesetzt werden.
  9.   und hier mittels getclip ausgelesen werden.
  10. */
  11. STATUS  =getclip(status)    /*Wo befindet sich OC gerade ?   
  12.                   "RUNNING" bedeutet das die Variablen werte
  13.                   den Zustand der aktuellen Berechnung widerspiegelt.
  14.                   "END" bedeutet das jetzt normalerweise der Requester
  15.                   mit der Endberechnung kommt...*/
  16.  
  17. PLonTIME=getclip(PLonTIME)    /*Time komplett Online [hh:mm:ss]*/
  18. PLonMAX    =getclip(PLonMAX)    /*Online Time Limit    [hh:mm:ss]*/
  19. PLonSCH    =getclip(PLonSCH)    /*Online Time Schwelle in Sekunden [xx]*/
  20. PLmaxDM    =getclip(PLmaxDM)    /*Maximales DM Limit   [xx]     */
  21. PLbisDM    =getclip(PLbisDM)    /*Bisherige Kosten     [xx]      */
  22. PLindex    =getclip(PLindex)    /*Suchmuster des eintrages [CHAR]*/
  23. PLzzgk    =getclip(PLzzgk)    /*zusatzgebühren kompl.    [xx]     */
  24. PLzzgm    =getclip(PLzzgm)    /*zusatzgebühren moment.[xx]     */
  25. PLinZ    =getclip(PLinZ)        /*Einlogzeit [hh:mm:ss]         */
  26. PLoutZ    =getclip(PLoutZ)    /*Auslogzeit [hh:mm:ss]         */
  27. PLtarif =getclip(PLtarif)    /*Verwendeter Berechnungstarif [xx] in Sec.*/
  28. /*
  29. Ab hier dürft ihr Programmieren was ihr wollt.(Abfragen ,sondertarifberechnungen,etc)
  30. oder simple CLI ausgaben... 8-)
  31. oder abfragen ob bestimmte Telefonnummern gewählt wurden ,ob dann die Online Zeit schon 
  32. über 2 stunden ist ,und ob solange die Zusatzgebühren wieder gelöscht werden ,weil noch 
  33. keine Anfallen dürfen. (eigentlich recht simpel zu Programmieren). 
  34. --------------------------------------------------------------------------------
  35. */
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55. /*
  56. --------------------------------------------------------------------------------
  57. Sämtliche Oben erwähnte Variablen werden wieder ab hier wieder an ONline_CHeck 
  58. übergeben und mit den Werten wird dann auch weitergerechnet.Also bitte immer 
  59. VORSICHTIG mit dem was Ihr tut !
  60. Ab hier bitte Nichts mehr verändern !! ,ab hier folgt die Rückgabe der variablen an OC.
  61. */
  62. call setclip(status,status)
  63. call setclip(PLonMAX,PLonMAX)
  64. call setclip(PLonSCH,PLonSCH)
  65. call setclip(PLonTIME,PLonTIME)
  66. call setclip(PLmaxDM,PLmaxDM)
  67. call setclip(PLbisDM,PLbisDM)
  68. call setclip(PLindex,PLindex)
  69. call setclip(PLzzgk,PLzzgk)
  70. call setclip(PLzzgm,PLzzgm)
  71. call setclip(PLinZ,PLinZ)
  72. call setclip(PLoutZ,PLoutZ)
  73. call setclip(PLtarif,PLtarif)
  74. return
  75.